home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Genius of Edison
/
The Genius of Edison (Version 1.0)(Softkey Multimedia)(GOE744AE-CD)(1996).ISO
/
pc
/
data
/
shared.cst
/
00071_Script_WAITTICKS
< prev
next >
Wrap
Text File
|
1996-09-03
|
754b
|
27 lines
-- -----------------------------------------------------------
-- Handler waitTicksProcessFrame performs a delay by waiting until the given
-- number of ticks passes. It also processes the frame.
on waitTicksProcessFrame howMany
put the ticks into startTicks
repeat while the ticks < startTicks + howMany
processFrame
end repeat
end
-- -----------------------------------------------------------
-- Handler waitTicksNoProcess performs a delay by waiting until the given
-- number of ticks passes and does not process the frame.
on waitTicksNoProcess howMany
put the ticks into startTicks
repeat while the ticks < startTicks + howMany
if the mouseDown then
exit
end if
end repeat
end